home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2002 May
/
chip-cd_2002_05.zip
/
05
/
Dom i biuro
/
Mr Faktury Pro 1.53
/
mr_faktury_pro.exe
/
0
/
RCDATA
/
TFCENY
/
TFCENY.txt
Wrap
Text File
|
2002-03-27
|
6KB
|
229 lines
object fCeny: TfCeny
Left = 281
Top = 292
Width = 616
Height = 279
Caption = 'Ceny'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object dbg: TDBGrid
Left = 0
Top = 0
Width = 608
Height = 217
Align = alTop
DataSource = ds
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'nazwa'
Width = 298
Visible = True
end
item
Expanded = False
FieldName = 'symbol'
Visible = True
end
item
Alignment = taRightJustify
Expanded = False
FieldName = 'cena_netto'
Title.Alignment = taRightJustify
Title.Caption = 'cena netto'
Visible = True
end
item
Alignment = taRightJustify
Expanded = False
FieldName = 'cena_brutto'
Title.Alignment = taRightJustify
Title.Caption = 'cena brutto'
Visible = True
end>
end
object eSzukaj: TEdit
Left = 160
Top = 224
Width = 177
Height = 21
TabOrder = 1
OnChange = eSzukajChange
end
object bNazwa: TButton
Left = 96
Top = 224
Width = 57
Height = 25
Caption = 'wg &nazwy'
TabOrder = 2
OnClick = bNazwaClick
end
object bSymbol: TButton
Left = 344
Top = 224
Width = 65
Height = 25
Caption = 'wg &symbolu'
TabOrder = 3
OnClick = bSymbolClick
end
object bDrukuj: TButton
Left = 432
Top = 224
Width = 65
Height = 25
Caption = '&Drukuj'
TabOrder = 4
OnClick = bDrukujClick
end
object bWyjdz: TBitBtn
Left = 528
Top = 224
Width = 75
Height = 25
Caption = '&Wyjd'#378
TabOrder = 5
OnClick = bWyjdzClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333000033338833333333333333333F333333333333
0000333911833333983333333388F333333F3333000033391118333911833333
38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
911118111118333338F3338F833338F3000033333911111111833333338F3338
3333F8330000333333911111183333333338F333333F83330000333333311111
8333333333338F3333383333000033333339111183333333333338F333833333
00003333339111118333333333333833338F3333000033333911181118333333
33338333338F333300003333911183911183333333383338F338F33300003333
9118333911183333338F33838F338F33000033333913333391113333338FF833
38F338F300003333333333333919333333388333338FFF830000333333333333
3333333333333333333888330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object bZmien: TBitBtn
Left = 8
Top = 224
Width = 73
Height = 25
Caption = '&Zmie'#324
TabOrder = 6
OnClick = bZmienClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object ds: TDataSource
DataSet = tTowar
Left = 24
Top = 72
end
object tTowar: TffTable
DatabaseName = 'mr_sklep'
FieldDefs = <>
SessionName = '[automatic]'
TableName = 'towar'
Timeout = 10000
OnCalcFields = tTowarCalcFields
Left = 64
Top = 72
object tTowarnazwa_f: TStringField
FieldName = 'nazwa_f'
Required = True
Size = 28
end
object tTowarnumer_grupy: TWordField
FieldName = 'numer_grupy'
Required = True
end
object tTowarjednostka: TWordField
FieldName = 'jednostka'
Required = True
end
object tTowarSWW: TStringField
FieldName = 'SWW'
Required = True
Size = 12
end
object tTowarstawka_VAT: TWordField
FieldName = 'stawka_VAT'
Required = True
end
object tTowarilosc: TFloatField
FieldName = 'ilosc'
Required = True
end
object tTowarilosc_minimalna: TFloatField
FieldName = 'ilosc_minimalna'
Required = True
end
object tTowarminimum: TWordField
FieldName = 'minimum'
Required = True
end
object tTowarrodzaj: TWordField
FieldName = 'rodzaj'
Required = True
end
object tTowarnumer: TAutoIncField
FieldName = 'numer'
end
object tTowarsymbol: TStringField
FieldName = 'symbol'
Required = True
Size = 14
end
object tTowarnazwa: TStringField
FieldName = 'nazwa'
Required = True
Size = 70
end
object tTowarcena_netto: TStringField
FieldKind = fkCalculated
FieldName = 'cena_netto'
Size = 15
Calculated = True
end
object tTowarcena_brutto: TStringField
FieldKind = fkCalculated
FieldName = 'cena_brutto'
Size = 15
Calculated = True
end
end
end